library(tidyverse)
data <- read_delim("bacterieZ", delim=" ")
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
data <- read_delim("bacterieZ", delim=" ")
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
plot = ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
plot
ggsave("plot.pdf", plot)
data <- read_delim("bacterieZ2", delim=" ")
plot = ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
data <- read_delim("mbacterie-k10", delim=" ")
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
data <- read_delim("mbacterie-k10", delim=" ")
ggplot(data = data) + geom_point(mapping = aes(x = Z1, y = Z2, color = D))
data <- read_delim("mbacterie-k10", delim=" ")
